home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 86
- Top = 70
- ActiveControl = Next
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Acceptable Use Policy'
- ClientHeight = 467
- ClientWidth = 668
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnMouseMove = FormMouseMove
- PixelsPerInch = 96
- TextHeight = 13
- object Title: TLabel
- Left = 488
- Top = 112
- Width = 177
- Height = 137
- Alignment = taCenter
- AutoSize = False
- Caption = 'Error!!'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -21
- Font.Name = 'Century Schoolbook'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- object Version: TLabel
- Left = 645
- Top = 456
- Width = 21
- Height = 13
- Caption = 'v1.0'
- end
- object SharePanel: TPanel
- Left = 496
- Top = 208
- Width = 161
- Height = 41
- Caption = 'SharePanel'
- Color = clRed
- TabOrder = 4
- object ShareWare: TButton
- Left = 8
- Top = 8
- Width = 145
- Height = 25
- Caption = 'Shareware Information'
- Font.Charset = ANSI_CHARSET
- Font.Color = clYellow
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- OnClick = ShareWareClick
- end
- end
- object Panel3: TPanel
- Left = 496
- Top = 248
- Width = 161
- Height = 161
- Caption = 'Panel3'
- TabOrder = 2
- object Label3: TLabel
- Left = 16
- Top = 56
- Width = 129
- Height = 49
- Alignment = taCenter
- AutoSize = False
- Caption = 'Press Next to go to the next page'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlue
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Next: TBitBtn
- Left = 24
- Top = 112
- Width = 105
- Height = 33
- Caption = '&Next'
- TabOrder = 0
- OnClick = NextClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFFFFF900FFFFFFFFFFFF99900FFFFFFFFFF9999900FFFFFFFF99999990
- 0FFFFFF99999999900FFFF9999999999900FFFFF999999900FFFFFFF99999990
- 0FFFFFFF999999900FFFFFFF999999900FFFFFFF999999900FFFFFFF99999990
- 0FFFFFFF99999990FFFFFFFF9999999FFFFFFFFFFFFFFFFFFFFF}
- end
- object Prev: TBitBtn
- Left = 24
- Top = 8
- Width = 105
- Height = 33
- Caption = '&Prev'
- TabOrder = 1
- OnClick = PrevClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFF9999999FFFFFFFFF99999990FFFFFFFF999999900FFFFFFF99999990
- 0FFFFFFF999999900FFFFFFF999999900FFFFFFF999999900FFFFFFF99999990
- 0FFFFF9999999999900FFFF99999999900FFFFFF999999900FFFFFFFF9999900
- FFFFFFFFFF99900FFFFFFFFFFFF900FFFFFFFFFFFFFFFFFFFFFF}
- end
- end
- object Panel2: TPanel
- Left = 496
- Top = 248
- Width = 161
- Height = 201
- TabOrder = 1
- Visible = False
- object Label1: TLabel
- Left = 8
- Top = 40
- Width = 145
- Height = 41
- Caption = 'To accept this policy Type '#39'ACCEPT'#39' Below.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object OK: TButton
- Left = 8
- Top = 120
- Width = 145
- Height = 33
- Caption = 'OK'
- TabOrder = 0
- OnClick = OKClick
- end
- object Cancel: TButton
- Left = 8
- Top = 160
- Width = 145
- Height = 33
- Caption = 'Cancel - Do Not Accept'
- TabOrder = 1
- OnClick = CancelClick
- end
- object Prev2: TBitBtn
- Left = 24
- Top = 8
- Width = 105
- Height = 33
- Caption = '&Prev'
- TabOrder = 2
- OnClick = PrevClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFF9999999FFFFFFFFF99999990FFFFFFFF999999900FFFFFFF99999990
- 0FFFFFFF999999900FFFFFFF999999900FFFFFFF999999900FFFFFFF99999990
- 0FFFFF9999999999900FFFF99999999900FFFFFF999999900FFFFFFFF9999900
- FFFFFFFFFF99900FFFFFFFFFFFF900FFFFFFFFFFFFFFFFFFFFFF}
- end
- object Enter: TEdit
- Left = 16
- Top = 80
- Width = 129
- Height = 21
- CharCase = ecUpperCase
- TabOrder = 3
- OnKeyDown = EnterKeyDown
- end
- end
- object Panel1: TPanel
- Left = 488
- Top = 16
- Width = 177
- Height = 89
- Caption = 'Error Loading Picture!'
- TabOrder = 0
- object Image1: TImage
- Left = 8
- Top = 8
- Width = 161
- Height = 73
- Stretch = True
- end
- end
- object ScrollBox: TScrollBox
- Left = 8
- Top = 8
- Width = 473
- Height = 449
- HorzScrollBar.Visible = False
- TabOrder = 3
- OnMouseMove = FormMouseMove
- object ViewPort: TRichEdit
- Left = 0
- Top = 0
- Width = 455
- Height = 450
- Cursor = crNo
- BorderStyle = bsNone
- Lines.Strings = (
- 'There Was an Error Loading the Text FIle')
- TabOrder = 0
- OnMouseMove = FormMouseMove
- end
- end
- end
-